object frmmain: Tfrmmain Left = 289 Top = 112 BorderIcons = [biSystemMenu, biMinimize] BorderStyle = bsSingle Caption = 'Registry Defrag' ClientHeight = 380 ClientWidth = 564 Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [] OldCreateOrder = False Position = poScreenCenter OnClose = FormClose OnCreate = FormCreate DesignSize = ( 564 380) PixelsPerInch = 96 TextHeight = 13 object Bevel1: TBevel Left = 0 Top = 336 Width = 564 Height = 14 Anchors = [akLeft, akRight, akBottom] Shape = bsTopLine end object Shape1: TShape Left = 0 Top = 0 Width = 563 Height = 337 Anchors = [akLeft, akTop, akRight, akBottom] Pen.Style = psClear end object Image3: TImage Left = 0 Top = 3 Width = 201 Height = 333 Anchors = [akLeft, akTop, akBottom] Picture.Data = {} end object BitBtn1: TBitBtn Left = 308 Top = 347 Width = 75 Height = 25 Action = actNext Anchors = [akRight, akBottom] Caption = 'Next >' TabOrder = 0 end object btnHelp: TBitBtn Left = 484 Top = 347 Width = 75 Height = 25 Action = actHelp Anchors = [akRight, akBottom] Caption = 'Help' TabOrder = 1 end object btnCancel: TBitBtn Left = 396 Top = 347 Width = 75 Height = 25 Action = actCancel Anchors = [akRight, akBottom] Caption = 'Cancel' TabOrder = 2 end object btnBack: TBitBtn Left = 228 Top = 347 Width = 75 Height = 25 Action = actBack Anchors = [akRight, akBottom] Caption = '< Back' TabOrder = 3 end object Notebook1: TNotebook Left = 200 Top = 0 Width = 362 Height = 336 Anchors = [akLeft, akTop, akRight, akBottom] Color = clWhite PageIndex = 1 ParentColor = False TabOrder = 4 object TPage Left = 0 Top = 0 Caption = 'welcome' object Label1: TLabel Left = 22 Top = 16 Width = 210 Height = 18 Caption = 'Welcome to Registry Defrag' Font.Charset = DEFAULT_CHARSET Font.Color = clNavy Font.Height = -15 Font.Name = 'Tahoma' Font.Style = [fsBold] ParentFont = False end object Label2: TLabel Left = 22 Top = 48 Width = 315 Height = 73 AutoSize = False Caption = 'Registry fragmentation can cause signficant PC slow-down. Regist' + 'ry Defrag compacts and optimizes the Windows registry by removin' + 'g unnecessary gaps and wasted space. Thsi can greatly improve yo' + 'ur computer performance.' WordWrap = True end object Label4: TLabel Left = 22 Top = 144 Width = 323 Height = 26 AutoSize = False Caption = '- Reducing fragmentation.' WordWrap = True end object Label5: TLabel Left = 22 Top = 168 Width = 323 Height = 25 AutoSize = False Caption = '- Repairing structural defects' WordWrap = True end object Label7: TLabel Left = 22 Top = 192 Width = 323 Height = 33 AutoSize = False Caption = '- Recovering unused memory space' WordWrap = True end object Label8: TLabel Left = 22 Top = 288 Width = 331 Height = 33 AutoSize = False Caption = 'Click Next to start analyzing the registry.' WordWrap = True end end object TPage Left = 0 Top = 0 Caption = 'scan result' object lblResult: TLabel Left = 22 Top = 32 Width = 323 Height = 57 AutoSize = False Caption = 'Registry Defrag can reduce the size of your registry by 4,920 Kb' + ' (5%)' WordWrap = True end object imgBefore: TImage Left = 22 Top = 88 Width = 323 Height = 18 Picture.Data = {} Stretch = True end object imgAfter: TImage Left = 22 Top = 88 Width = 249 Height = 17 Picture.Data = {} Stretch = True end object Image1: TImage Left = 22 Top = 128 Width = 16 Height = 16 Picture.Data = {} end object Label3: TLabel Left = 43 Top = 129 Width = 126 Height = 13 AutoSize = False Caption = 'Size after optimization:' WordWrap = True end object lblafter: TLabel Left = 208 Top = 129 Width = 73 Height = 13 Alignment = taRightJustify AutoSize = False Caption = '4,920 Kb' WordWrap = True end object lblafterpercent: TLabel Left = 296 Top = 129 Width = 41 Height = 13 Alignment = taRightJustify AutoSize = False Caption = '(5%)' WordWrap = True end object Image2: TImage Left = 22 Top = 152 Width = 16 Height = 16 Picture.Data = {} end object Label6: TLabel Left = 43 Top = 154 Width = 134 Height = 13 AutoSize = False Caption = 'Size difference:' WordWrap = True end object lbldiff: TLabel Left = 208 Top = 154 Width = 73 Height = 13 Alignment = taRightJustify AutoSize = False Caption = '4,920 Kb' WordWrap = True end object lbldiffpercent: TLabel Left = 296 Top = 154 Width = 41 Height = 13 Alignment = taRightJustify AutoSize = False Caption = '(5%)' WordWrap = True end object lblResult2: TLabel Left = 22 Top = 224 Width = 323 Height = 81 AutoSize = False Caption = 'Click Next to begin defragmentation(Reboot required). Click Canc' + 'el if you do not wish to optimize your registry, or if you wish ' + 'to optimize at a later time.' WordWrap = True end end end object ActionList1: TActionList Left = 353 Top = 8 object actBack: TAction Caption = '< Back' OnExecute = actBackExecute end object actNext: TAction Caption = 'Next >' OnExecute = actNextExecute end object actCancel: TAction Caption = 'Cancel' OnExecute = actCancelExecute end object actHelp: TAction Caption = 'Help' OnExecute = actHelpExecute end end end